home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2006 May / PCWMAY06.iso / Software / Freeware / First Page 2006 3.00 / fp2006-final-3.00-setup.exe / {app} / Iscripts / Forms Misc / word-counter.izs < prev    next >
Text File  |  2005-09-28  |  6KB  |  178 lines
  1. <!NOWIZARD>
  2.  
  3. <!TITLE>Word Counter 
  4.  
  5. <!/TITLE>
  6.  
  7. <!DESCRIPTION> This is a handy script that counts the words (or characters) entered into a textarea and limits it to 100 words or less (this can be changed).  <!/DESCRIPTION> 
  8.  
  9. <!CATEGORY>Forms<!/CATEGORY>
  10.  
  11. <!SCRIPT>
  12. <!-- START OF SCRIPT -->
  13.  
  14.  
  15. <!-- HOW TO INSTALL WORD COUNTER:
  16.  
  17.   1.  Copy code into the HEAD section of document
  18.   2.  Put last coding into the BODY section of document  -->
  19.  
  20. <!-- STEP ONE: Add code into HEAD section of document  -->
  21.  
  22. <HEAD>
  23.  
  24. <SCRIPT LANGUAGE="JavaScript">
  25.  
  26.  
  27.  
  28. <!-- Begin
  29.    var submitcount=0;
  30.    function checkSubmit() {
  31.  
  32.       if (submitcount == 0)
  33.       {
  34.       submitcount++;
  35.       document.Surv.submit();
  36.       }
  37.    }
  38.  
  39.  
  40. function wordCounter(field, countfield, maxlimit) {
  41. wordcounter=0;
  42. for (x=0;x<field.value.length;x++) {
  43.       if (field.value.charAt(x) == " " && field.value.charAt(x-1) != " ")  {wordcounter++}  // Counts the spaces while ignoring double spaces, usually one in between each word.
  44.       if (wordcounter > 250) {field.value = field.value.substring(0, x);}
  45.       else {countfield.value = maxlimit - wordcounter;}
  46.       }
  47.    }
  48.  
  49. function textCounter(field, countfield, maxlimit) {
  50.   if (field.value.length > maxlimit)
  51.       {field.value = field.value.substring(0, maxlimit);}
  52.       else
  53.       {countfield.value = maxlimit - field.value.length;}
  54.   }
  55. //  End -->
  56. </script>
  57.  
  58. </HEAD>
  59.  
  60. <!-- STEP TWO: Add code into BODY section of document  -->
  61.  
  62. <BODY>
  63.  
  64.  
  65. <FORM NAME=Surv>
  66. <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="3" width=550>
  67. <tr><td valign="top">
  68. <font color="000000" size="2" face="verdana, helvetica, arial">In 100 <b>words</b> or less, why do you (or would you) like living on the coast?</font><font color="ff0000" size="2" face="verdana, helvetica, arial">*</font>
  69. <td valign="top"><textarea name="Q3367" cols="40" rows="5" wrap="hard" onKeyDown="wordCounter(this.form.Q3367,this.form.remLen,100);" onKeyUp="wordCounter(this.form.Q3367,this.form.remLen,100);"></textarea>
  70. <br>Words remaining: <input type=box readonly name=remLen size=3 value=100></td></tr>
  71.  
  72. <tr><td colspan=2><hr width=80%></td></tr>
  73.  
  74. <tr><td valign="top">
  75. <font color="000000" size="2" face="verdana, helvetica, arial">In 100 <b>characters</b> or less, why do you (or would you) like living on the coast?</font><font color="ff0000" size="2" face="verdana, helvetica, arial">*</font>
  76. <td valign="top">
  77. <textarea name="Q336" cols="40" rows="5" wrap="hard" onKeyDown="textCounter(this.form.Q336,this.form.remLentext,100);" onKeyUp="textCounter(this.form.Q336,this.form.remLentext,100);"></textarea>
  78. <br>Characters remaining: <input type=box readonly name=remLentext size=3 value=100>
  79. </td></tr>
  80. </TABLE>
  81.  
  82. <INPUT TYPE="button" VALUE="Submit" onclick='' name=submit1>
  83. <INPUT TYPE="reset" VALUE="Reset" id=reset1 name=reset1>
  84. </FORM>
  85. <P>
  86. <FONT SIZE="-2" COLOR="ff0000" FACE="verdana, helvetica, arial">*</FONT><FONT SIZE="-2" COLOR="4169e1" FACE="verdana, helvetica, arial"> Indicates a required question.</FONT>
  87.  
  88.  
  89.  
  90.  
  91. <!-- END OF SCRIPT -->
  92. <!/SCRIPT>
  93.  
  94. <!PREVIEW>
  95. <!-- START OF SCRIPT -->
  96.  
  97.  
  98.  
  99. <!-- HOW TO INSTALL WORD COUNTER:
  100.  
  101.   1.  Copy code into the HEAD section of document
  102.   2.  Put last coding into the BODY section of document  -->
  103.  
  104. <!-- STEP ONE: Add code into HEAD section of document  -->
  105.  
  106. <HEAD>
  107.  
  108. <SCRIPT LANGUAGE="JavaScript">
  109.  
  110.  
  111.  
  112. <!-- Begin
  113.    var submitcount=0;
  114.    function checkSubmit() {
  115.  
  116.       if (submitcount == 0)
  117.       {
  118.       submitcount++;
  119.       document.Surv.submit();
  120.       }
  121.    }
  122.  
  123.  
  124. function wordCounter(field, countfield, maxlimit) {
  125. wordcounter=0;
  126. for (x=0;x<field.value.length;x++) {
  127.       if (field.value.charAt(x) == " " && field.value.charAt(x-1) != " ")  {wordcounter++}  // Counts the spaces while ignoring double spaces, usually one in between each word.
  128.       if (wordcounter > 250) {field.value = field.value.substring(0, x);}
  129.       else {countfield.value = maxlimit - wordcounter;}
  130.       }
  131.    }
  132.  
  133. function textCounter(field, countfield, maxlimit) {
  134.   if (field.value.length > maxlimit)
  135.       {field.value = field.value.substring(0, maxlimit);}
  136.       else
  137.       {countfield.value = maxlimit - field.value.length;}
  138.   }
  139. //  End -->
  140. </script>
  141.  
  142. </HEAD>
  143.  
  144. <!-- STEP TWO: Add code into BODY section of document  -->
  145.  
  146. <BODY>
  147.  
  148.  
  149. <FORM NAME=Surv>
  150. <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="3" width=550>
  151. <tr><td valign="top">
  152. <font color="000000" size="2" face="verdana, helvetica, arial">In 100 <b>words</b> or less, why do you (or would you) like living on the coast?</font><font color="ff0000" size="2" face="verdana, helvetica, arial">*</font>
  153. <td valign="top"><textarea name="Q3367" cols="40" rows="5" wrap="hard" onKeyDown="wordCounter(this.form.Q3367,this.form.remLen,100);" onKeyUp="wordCounter(this.form.Q3367,this.form.remLen,100);"></textarea>
  154. <br>Words remaining: <input type=box readonly name=remLen size=3 value=100></td></tr>
  155.  
  156. <tr><td colspan=2><hr width=80%></td></tr>
  157.  
  158. <tr><td valign="top">
  159. <font color="000000" size="2" face="verdana, helvetica, arial">In 100 <b>characters</b> or less, why do you (or would you) like living on the coast?</font><font color="ff0000" size="2" face="verdana, helvetica, arial">*</font>
  160. <td valign="top">
  161. <textarea name="Q336" cols="40" rows="5" wrap="hard" onKeyDown="textCounter(this.form.Q336,this.form.remLentext,100);" onKeyUp="textCounter(this.form.Q336,this.form.remLentext,100);"></textarea>
  162. <br>Characters remaining: <input type=box readonly name=remLentext size=3 value=100>
  163. </td></tr>
  164. </TABLE>
  165.  
  166. <INPUT TYPE="button" VALUE="Submit" onclick='' name=submit1>
  167. <INPUT TYPE="reset" VALUE="Reset" id=reset1 name=reset1>
  168. </FORM>
  169. <P>
  170. <FONT SIZE="-2" COLOR="ff0000" FACE="verdana, helvetica, arial">*</FONT><FONT SIZE="-2" COLOR="4169e1" FACE="verdana, helvetica, arial"> Indicates a required question.</FONT>
  171.  
  172.  
  173.  
  174. <!-- END OF SCRIPT -->
  175. <!/PREVIEW>
  176.  
  177. <!RELATED>NONE<!/RELATED>
  178.